﻿Imports Microsoft.VisualBasic
Imports System.Data
Imports System.Data.SqlClient

Public Class TipoDocumentoDB
    Public Shared Function GetTiposDocumento() As DataSet
        Dim cmd As New SqlCommand("spGetTiposDocumentos", DB.Conexion)
        Dim da As New SqlDataAdapter
        Dim ds As New DataSet

        cmd.CommandType = CommandType.StoredProcedure
        da.SelectCommand = cmd
        da.Fill(ds, "TiposDocumentos")
        Return ds
    End Function
End Class
